object fLockUp: TfLockUp
  Left = 398
  Top = 254
  BorderStyle = bsDialog
  Caption = 'Admin Password Utility'
  ClientHeight = 113
  ClientWidth = 325
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 325
    Height = 85
    Shape = bsFrame
  end
  object Label2: TLabel
    Left = 4
    Top = 4
    Width = 34
    Height = 13
    Caption = 'Current'
  end
  object Label3: TLabel
    Left = 164
    Top = 44
    Width = 145
    Height = 13
    Caption = 'Verify New Admin Password'
  end
  object Label4: TLabel
    Left = 164
    Top = 4
    Width = 126
    Height = 13
    Caption = 'New  (Min 4, Max 13 Char)'
  end
  object Edit1: TEdit
    Left = 4
    Top = 20
    Width = 157
    Height = 21
    Hint = 'Enter the current Admin password on this line.'
    ParentShowHint = False
    PasswordChar = '*'
    ShowHint = True
    TabOrder = 0
  end
  object Button1: TButton
    Left = 164
    Top = 92
    Width = 75
    Height = 17
    Caption = 'Set &Password'
    TabOrder = 3
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 248
    Top = 92
    Width = 75
    Height = 17
    Caption = '&Exit'
    TabOrder = 4
    OnClick = Button2Click
  end
  object Edit2: TEdit
    Left = 164
    Top = 20
    Width = 157
    Height = 21
    Hint = 
      'Enter the new password here.  (word may by upper or lowercase, b' +
      'ut must be between 4 and 8 char long.'
    ParentShowHint = False
    PasswordChar = '*'
    ShowHint = True
    TabOrder = 1
  end
  object Edit3: TEdit
    Left = 164
    Top = 60
    Width = 157
    Height = 21
    Hint = 'Verify the new Admin password.'
    ParentShowHint = False
    PasswordChar = '*'
    ShowHint = True
    TabOrder = 2
  end
  object ini: TListBox
    Left = 96
    Top = 224
    Width = 121
    Height = 97
    ItemHeight = 13
    TabOrder = 5
    Visible = False
  end
  object Memo1: TMemo
    Left = 4
    Top = 48
    Width = 157
    Height = 33
    Color = clBtnFace
    Ctl3D = False
    Lines.Strings = (
      'This password is case sensitive. '
      'The default is PassWordCrash.')
    ParentCtl3D = False
    TabOrder = 6
  end
  object ProgramCheck1: TProgramCheck
    Active = True
    AutoCheck = True
    OnCheckError = ProgramCheck1CheckError
    Left = 36
    Top = 92
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 80
    Top = 92
  end
end